home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 124 / Tiger_Disk_124_20xx_Tiger-Crew-Disk_de_Side_B.d64 / ende ii_11 (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  442b  |  9 lines
  1. 10 printchr$(147):poke53280,.:poke53281,.:fori=1025to1124:s=54272:pokes+24,15
  2. 12 poke214,3:sys58640:print"[145][169][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][223]";
  3. 13 a=a+11:forc=3to5:poke646,c:ifa=429thenfort=1to500:next:sys59749:goto20
  4. 14 print"[169][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][223]";:pokei,66+(c-2):pokes+4,21
  5. 15 pokes+22,9:pokes+5,1*2+7:pokes+6,239:pokes+1,rnd(3)*.7:pokes+4,48:pokes+4,24
  6. 16 poke646,c+1: print"[165]                 [146]ende                 [167]";
  7. 18 next:next:      goto10
  8. 20 print"[147][151]lukian":fort=1to3333:next:sys2048
  9.